 program ccso

  write(6,*)'ccso program'

 end
